Plot[20log10[abs[[(iw-i*1.45)(iw-i*2.3)]/[(iw-(-0.2482-i*1.216))(iw-(-0.6239-i*0.7445))(iw-(-0.7175-i*0.0388))(iw-(-0.2961+i*0.9525))(iw-(-0.0856+i*1.0893))(iw-(-0.5523+i*0.5862))*4.382]]], {w, -5,5}]